Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ProgressBar1.Minimum = 10
        ProgressBar1.Maximum = 100
        ProgressBar1.Value = 60
    End Sub
End Class
